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Fig. 2 
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Fig. 4(a) Fig. 4(b) 




OUT 



Fig. 5 



/* hwmode 1 . h */ 




extern 


short 


IMEM[N1]: 


extern 


short 


DMEMA[N2] : 


extern 


short 


DMEMA[N3] : 


extern 


short 


IR 




extern 


short 


PC 




extern 


short 


RO 




extern 


short 


R1 




extern 


short 


R2 




extern 


short 


R3 




extern 


void ALU (short, short, short*, int) ; 


extern 


void MEMO (short, short*, int); 


enum { 








ADD=0. SUB. 


AND. OR 


}: 
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Fig. 6 



short IMEM[N1]; 
short DMEMA[N2]: 
short DMEMB[N3] ; 



short IR. PC. RO. R1, R2. R3; 



void ALU (short INI. short IN2. short *OUT. int CTL) { 
switch (CTL) { 



case 0; 


// ADD 


*OUT = 


INI + IN2: 


break ; 




case 1 ; 


// SUB 


♦OUT = 


INI - IN2: 


break; 




case 2: 


// AND 


♦OUT = 


IN1 & IN2: 


break ; 




case 3: 


// OR 


♦OUT = 


INI ; IN2: 


break ; 




} 





void MEMC (short AD. short *DB. int RW) { 
switch (RW) { 
case 1 : // Read 
if (AD < 0x100) 

*DB = DMEMA[AD & OxFF] : 
else 

*DB = DMEMB[AD & OxFF] : 
break : 

case 0: //Write 
if (AD < 0x100) 

DMEMACAD & OxFF] = *DB: 
else 

DMEMB[AD & OxFF] = *DBl 
break: 

} 

} 
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Fig. 7 


# i nc 1 ude "hwmode 1 . h" 




void ADD (short *RS1. short RS2) 
ALU(*RS1. RS2, RSI. ADD): 

1 


{ 


void SUB (short *RS1, short RS2) 
ALU(*RS1. RS2, RSI. SUB): 

} 


{ 


void AND (short *RS1. short RS2) 
ALU(*RS1. RS2. RSI. AND): 

} 


{ 


void OR (short *RS1, short RS2) 
ALU(*RS1. RS2, RSI. OR): 

} 


{ 


void LD (short *RS1. short RS2) 
MEMC(RS2. RS1. 1): 

} 


{ 


void ST (short *RS1, short RS2) 
MEI«C(RS2. RSI. 0); 

} 


{ 


void SET (short *RS1. short IMD) 
♦RSI = IMD: 

} 


{ 


void MOV (short *RS1, short RS2) 
*RS1 = RS2: 

1 


{ 
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Fig. 8(a) 



/* inst. h */ 






extern 


void 


ADD (short 


short) ; 


extern 


void 


SUB (short *. 


short) ; 


extern 


void 


AND (short *. 


short) ; 


extern 


void 


OR (short *, 


short) ; 


extern 


void 


LD (short *. 


short) ; 


extern 


void 


ST (short *, 


short) ; 


extern 


void 


SET (short *, 


short) : 


extern 


void 


MOV (short *. 


short) : 



Fig. 8(b) 



#inclucie 


inst. h" 


roain( ) { 




SET(&RO, 


0x33) : 


SET(&R1, 


0x77) : 


M0V(&R2. 


RO) : 


ANb(&R2, 


R1); 


OR (&R1, 


RO) ; 


SET(&RO. 


0x2) ; 


SET(&R3. 


0x0) : 


ST (&R2, 


R3) : 


ADD (&R3. 


RO) ; 


ST (&R1, 


R3) ; 


} 





103 
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Fig. 9(a) 



#include inst. h 
ma i n 0 { 



SET (&R0, 


0x33) : 


SET(&R1, 


0x77) : 


M0V(&R2, 


RO) : 


AND (&R2. 


Rl): 


OR (&R1. 


RO) : 


SET (&R0. 


0x2) : 


SET (&R3, 


0x0) : 


ST (&R2. 


R3) : 


ADD(&R3. 


RO): 


ST (&R1. 


R3): 



II 



trans I ator 



object-code 



@00 


60 33 61 77 


@04 


72 00 22 10 


@08 


31 00 60 02 


@0C 


63 00 52 30 


§10 


03 00 51 30 
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Fig. 9(b) 



main- 






OCT 

obi 


DA 
KO, 


UXoo 


CCT 

obi 


Rl. 


OX// 


MOV 


R2. 


RO 


AND 


R2. 


Rl 


OR 


Rl. 


RO 


SET 


RO. 


0x2 


SET 


R3. 


0x0 


ST 


RO. 


@R3 


ADD 


R3, 


RO 


ST 


Rl. 


@R3 



IE 



assemb I er 



IF 



object-code 



901 



@00 


60 


33 61 77 


@04 


72 


00 22 10 


@08 


31 


00 60 02 


@0C 


63 


00 52 30 


@10 


03 


00 51 30 
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g. 10 



# i nc I ude "hwmode I . h 

enum ( 

Fetch=0, Decode, Exec 

}; 

i nt eye I e ; 
int state; 

int *reg[4] = {&R0. &R1. &R2, &R3} ; 

mainO { 
cycle = 0; 
state = Fetch; 
wh i I e (exec () ) ; 
pr i ntf ("eye I e-%d\n", eye I e) ; 

} 

int execO { 
int cd[3]; 

cycle++; 

switch (state) { 
case Fetch: 

IR - IMEM[PC]; 
if (IR < 0) 
return 0; 
else { 
PC++; 

state = Decode; 
return 1 ; 

1 

case Decode: 

cd[0] = (IR»4)&0x7: 

cd[l] = (IR»2)&0x3: 

cd[2] = IR & 0x3: 

return 1 ; 
case Exec: 

if (cdCO]=OxO) 
ALU (*reg [cd [1 ] ] . *reg [cd [2] ] . reg [cd [1 ] ] . ADD) ; 

else if ((IR»4) = 0x1) 
ALU (*reg [cd [1 ] ] . *reg [cd [2] ] , reg [cd [1 ] ] . SUB) : 



state = Fetch; 
return 1 : 

} 

} 
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g. 11 



short IMEM[N1]: 
short DMEMA[N2]: 
short DMEMB[N3]; 

short IR, PC, RO. R1. R2, R3: 
long cycle; 
double power: 

void ALU (short INI, short IN2, short ♦OUT. int CTL) { 
switch (CTL){ 
case ADD: 

♦OUT = INI + IN2: 

break; 
case SUB: 

♦OUT = INI - IN2; 

break: 
case AND: 

♦OUT = IN1 & IN2: 

break : 
case OR: 

♦OUT = INI ! IN2: 

break ; 

} 

cvc I e += 1 : 
power += 0. 01 : 

} 

void MEMO (short AD, short *DB. int RW) { 
switch (RW){ 
case 1 : // Read 
if (AD < 0x100) 

*DB = DMEMA[AD & OxFF] ; 
else 

*DB = DMEMBEAD & OxFF]; 
cvc I e += 1 : 
power += 0. 02: 
break; 

case 0: // Write 
if (AD < 0x100) 

DMEMA[AD & OxFF] 
else 

DMEMBEAD & OxFF] 
cvcle += 2; 
power += 0. 04; 
break : 

1 

} 



= ♦DB; 
= ♦DB: 
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g. 12 



# i nc I ude "hwmode I . 

void ADD (short *RS1, short RS2) { 
ALU(>icRS1.RS2, RSI. ADD) : 

} 

void SUB (short *RS1, short RS2) { 
ALU(>fRS1,RS2, RSI. SUB) : 

} 

void AND (short *RS1, short RS2) { 
ALU(«RS1,RS2, RSI. AND) : 

} 

void OR (short *RS1, short RS2) { 
ALU(*RS1,RS2,RS1.0R) : 

} 

void LD (short *RS1. short RS2) { 
IVIEMC(RS2.RS1. 1) ; 

} 

void ST (short *RS1, short RS2) { 
MEMC(RS2.RS1,0) : 

} 

void SET (short *RS1. short IMD) { 
*RS1 = IMD: 
cvc I e += 1 ; 
power += 0.005: 

} 

void MOV (short *RS1. short RS2) { 
*RS1 = RS2; 
cvc I e += 1 : 
power += 0.005: 

} 
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Fig. 13 



#include 


inst. h" 


main( ) { 




SET (&R0, 


0x33) : 


SET (&R1 . 


0x77) : 


MOV (&R2, 


RO) : 


AND(&R2, 


Rl) : 


OR (&R1. 


RO) : 


SET (&R0. 


0x2) : 


SET (&R3. 


0x0) : 


ST (&R2. 


R3) ; 


ADD(&R3. 


RO) : 


ST (&R1. 


R3) : 


or i ntf (cvc 1 e="%d\n''. cvc 1 e) : 


Drintf (Dower=''%f\n". DOwer) : 


} 
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Fig. 14 



# include "hwmodel. h 

I ong eye I e : 
long code: 
double power; 

void ADD (short *RS1, short RS2) { 
ALU(*RS1, RS2, RSI, ADD): 
eye I e += eye I e_tb1 [0] : 
power += power_tb1 [0] ; 
code += 2: 

1 

void SUB (short *RS1, short RS2) { 
ALU(*RS1, RS2, RS1, SUB); 
cycle eycle_tb1 [1] : 
power += power_tb1 [1] : 
code += 2: 

} 



void LD (short *RS1, short RS2) { 
MEMC(RS2, RSI, 1); 

eye I e += eye I e_tb1 [4] : 
power += power tbi [4] : 
code 2: 

} 

void ST (short *RS1, short RS2) { 
MEMC(RS2. RS1. 0): 
eye I e += eye I e_tb1 [5] : 
power += power tbi [5] : 
code += 2: 

} 



void MOV (short *RS1, short RS2) { 
*RS1 = RS2: 

eye I e += eye I e tbi [7] : 
power += power _tb1 [7] ; 
code += 2: 

1 
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Fig. 15(a) 



i nstruct i on 


index 


eye 1 e_tb 1 [ ] 


power_tb 1 [ ] 


ADD 


0 


1 


0. 01 


SUB 


1 


1 


0. 01 


AND 


2 


1 


0. 01 


OR 


3 


1 


0. 01 


LD 


4 


2 


0. 02 


ST 


5 


3 


0. 03 


SET 


6 


1 


0. 005 


MOV 


7 


1 


0. 005 



Fig. 15(b) 

long cyele_tbl [8] ; 
I ong power_tb I [8] ; 

init(){ 

f p = f open ("tab I e", r) : 

for (i=0: i<8; 
f scant (f p. "%d, %f". &cye I e_tb I [ i ] . &power_tb I [ i ] ) : 
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